home *** CD-ROM | disk | FTP | other *** search
/ The World's Largest Collection of Windows Software / The World's Largest Collection of Windows Software - Disc 2.iso / textproc / globlabb / gab00002.ga_ / gab00002.ga (.txt)
Microsoft Windows Help File Content  |  1994-05-06  |  11KB  |  191 lines
  1. ::VB Syntax Set  (Global Abbreviations Sample)
  2. ::c:\globlabb\GAB00002.GAB
  3. ;Do '+Do {[}+{{}+While +| +Until+{}} condition{]}{ENTER}{TAB}'{[}statementblock{]}{ENTER}'{[}+Exit +Do{]}{ENTER}'{[}statementblock{]}{ENTER}{BS}'+Loop
  4. ;For '+For counter=start +To end {[}+Step increment{]}{ENTER}{TAB}'{[}statementblock{]}{ENTER}'{[}+Exit +For{]}{ENTER}'{[}statementblock{]}{ENTER}{BS}'+Next{[}counter{[},counter{]}{[},...{]}{]}
  5. ;Function '{[}+Static{]} {[}+Private{]} +Function functionname {[}+{(}argumentlist+{)}{]}{[}+As type{]}{ENTER}{TAB}'{[}statementblock{]}{ENTER}'{[}functionname = expression{]}{ENTER}'{[}+Exit +Function{]}{ENTER}'{[}statementblock{]}{ENTER}'{[}functionname = expression{]}{ENTER}{BS}'+End +Function
  6. ;If '+If condition1 +Then{ENTER}{TAB}'{[}statementblock-1{]}{ENTER}'{[}+Elseif condition2 +Then{ENTER}{TAB}'{[}statementblock-2{]} {]}{ENTER}{BS}'{[}+Else{ENTER}{TAB}'{[}statementblock-n{]} {]}{ENTER}{BS}{BS}'+End +If
  7. ;Select '+Select +Case testexpression{ENTER}{TAB}'{[}+Case expressionlist1{ENTER}{TAB}'{[}statementblock-1{[} {]}{ENTER}{BS}'{[}+Case expressionlist2{ENTER}{TAB}'{[}statementblock-2{]} {]}{ENTER}{BS}'{[}+Case +Else{ENTER}{TAB}'{[}statementblck-n{]} {]}{ENTER}{BS}{BS}'+End +Select
  8. ;Sub '{[}+Static{]} {[}+Private{]} +Sub subname {[}+{(}arglist+{)}{]}{ENTER}{TAB}'{[}statementblock{]}{ENTER}'{[}+Exit +Sub{]}{ENTER}'{[}statementblock{]}{ENTER}{BS}'+End +Sub
  9. ;Type '+Type usertype{ENTER}{TAB}'elementname {[}+{(}subscripts+{)}{]} +As typename{ENTER}'{[}elementname {[}+{(}subscripts+{)}{]} +As typename{ENTER}{BS}'+End +Type
  10. AddItem 'control.AddItem item [,index]  Note: index is position, zero based
  11. Arrange 'mdiform.Arrange arrangement  Note: see predefined contants
  12. Choose 'Choose( indexnum, varexpr [,varexpr ] . . .)  
  13. Circle '[object.]Circle [Step](x, y), radius[,[color] [,[start] [,[end] [,aspect] ] ] ]
  14. Close 'Close [[#]filenumber] [,[#]filenumber] . . .
  15. CompactDB 'CompactDatabase sourcename, destinationname [, locale [, options ] ]
  16. Cosecant 'Cosec(X) = 1 / Sin(X)
  17. Cotangent 'Cotan((X) = 1 / Tan(X)
  18. CreateDB 'Set dbobject = CreateDatabase( dbname [, locale [, options ]] )
  19. CreateDS1 'Set dynasetobject = database.CreateDynaset( source [, options ] )
  20. CreateDS2 'Set dynasetobject = { recordset | querydef }.CreateDynaset( [ options ] )
  21. CreateQD 'Set querydef = database.CreateQueryDef(name [, sqltext ])
  22. CreateSS1 'Set snapshot = database.CreateSnapshot( source [, options ] ) 
  23. CreateSS2 'Set snapshot = recordset.CreateSnapshot( [ options ] )
  24. DateAdd 'DateAdd( interval, number, date )
  25. DateDiff 'DateDiff( interval, date1, date2 )
  26. DatePart 'DatePart( interval, date )
  27. DateSerial 'DateSerial(year,month,day)
  28. DateValue 'DateValue(stringexpression)
  29. DDB 'DDB(cost, salvage, life, period)
  30. Declare1 'Declare Sub globalname Lib "libname" [Alias "aliasname" ][([argumentlist])]
  31. Declare2 'Declare Function globalname Lib libname [Alias aliasname ] [([argumentlist])] [As type]
  32. Delete1 'recordset.Delete
  33. Delete2 'collection.Delete membername (Professional Edition Only)
  34. DeleteQD 'database.DeleteQueryDef( name )
  35. Dim 'Dim varname[([subscripts])][As [New] type][, varname[([subscripts])][As [New] type] ] . . .
  36. Dir$ 'Dir[$] [(filespec [,attrmask])]
  37. Drag '[control.] Drag [action]  Note Action values: 0 -> Cancel, 1-> Begin, 2 -> End (drop)
  38. Environ1 'Environ[$](environmentstring)
  39. Environ2 'Environ[$](n)
  40. Eqv 'result = expr1 Eqv expr2
  41. Erase 'Erase arrayname [, arrayname] . . .
  42. Error$ 'Error[$][(errorcode)]
  43. Execute1 'dbobject.Execute { queryname | sqlstatement }[, options ]
  44. ExecuteSQL 'rows = database.ExecuteSQL( sqlstatement )
  45. Exexute2 'querydef.Execute [ options ]
  46. FieldSize 'sizevar = fieldobject.FieldSize( )
  47. FileAttr 'FileAttr(filenumber, attribute)
  48. FileCopy 'FileCopy srcfile, destfile
  49. FileDT 'FileDateTime (filename)
  50. FindFirst 'recordset.FindFirst criteria
  51. FindLast 'recordset.FindLast criteria
  52. FindNext 'recordset.FindNext criteria
  53. FindPrevious 'recordset.FindPrevious criteria
  54. Format 'Format[$](expression[, fmt] )
  55. FV 'FV(rate, nper, pmt, pv, due)
  56. Get 'Get [#] filenumber,[recordnumber],variablename 
  57. GetAttr 'GetAttr (filename)
  58. GetChunk 'stringvar = fieldobject.GetChunk( offset, numbytes )
  59. GetData 'Clipboard.GetData ([format])  Note: see CF_ constants
  60. GetFormat 'Clipboard.GetFormat (format) Note: see CF_ constants
  61. GetObject 'GetObject (filename [, class ])
  62. GetText 'Clipboard.GetText ([format])  Note: see CF_ constants
  63. Global 'Global varname[([subscripts])] [As [New] type] [, varname[([subscripts])] [As [New] type] ] . . .
  64. GoTo 'GoTo { linelabel | linenumber}
  65. HyperbolicCosecant 'HCosec(X) = 2 / (Exp(X) - Exp(-X))
  66. HyperbolicCosine 'HCos(X) = (Exp(X) + Exp(-X)) / 2
  67. HyperbolicCotangent 'HCotan(X) = (Exp(X) + Exp(-X)) / (Exp(X) - Exp(-X))
  68. HyperbolicSecant 'HSec(X) = 2 / (Exp(X) + Exp(-X))
  69. HyperbolicSine 'HSin(X) = (Exp(X) - Exp(-X)) / 2 
  70. HyperbolicTangent 'HTan(X) = (Exp(X) - Exp(-X)) / (Exp(X) + Exp(-X))
  71. IIf 'IIf( expr, truepart, falsepart ) Note: requires msafinx.dll !!
  72. Imp 'result = expr1 Imp expr2
  73. In 'expr [Not] In (value1, value2,  . . .) Note: SQL only
  74. Input 'Input # filenumber, variablelist
  75. Input$ 'Input[$](n,[#]filenumber)
  76. InputBox 'InputBox[$](prompt [, [title] [, [default][, xpos, ypos ] ] ])
  77. InStr ' InStr(start, strexpr1, strexpr2 [, compare] )
  78. Inverse Sine 'Arcsin(X) = Atn(X / Sqr(-X * X + 1))
  79. InverseCosecant 'Arccosec(X) = Atn(X/Sqr(X * X - 1)) + (Sgn(X) - 1) * 1.5708
  80. InverseCosine 'Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 1.5708
  81. InverseCotangent 'Arccotan(X) = Atn(X) + 1.5708
  82. InverseHyperbolicCosecant 'HArccosec(X) = Log((Sgn(X) * Sqr(X * X + 1) +1) / X)
  83. InverseHyperbolicCosine 'HArccos(X) = Log(X + Sqr(X * X - 1))
  84. InverseHyperbolicCotangent 'HArccotan(X) = Log((X + 1) / (X - 1)) / 2
  85. InverseHyperbolicSecant 'HArcsec(X) = Log((Sqr(-X * X + 1) + 1) / X)
  86. InverseHyperbolicSine 'HArcsin(X) = Log(X + Sqr(X * X + 1))
  87. InverseHyperbolicTangent 'HArctan(X) = Log((1 + X) / (1 - X)) / 2
  88. InverseSecant 'Arcsec(X) = Atn(X / Sqr(X * X - 1)) + Sgn(Sgn(X) -1) * 1.5708
  89. IPmt 'IPmt(rate, per, nper, pv, fv, due)
  90. IRR 'IRR(valuearray( ), guess)
  91. Is 'result = objref1 Is objref2
  92. LBound 'LBound(array [,dimension])
  93. Left$ 'Left[$](strexpr, n)
  94. Like 'result = expression Like pattern
  95. Line '[object.]Line [[Step](x1, y1)] - [Step](x2, y2) [,[color][,B[F]]]
  96. Line_Input 'Line Input # filenumber, variablename
  97. LinkEx 'control.LinkExecute cmdstring
  98. LinkPoke 'control.LinkPoke
  99. LinkRequest 'control.LinkRequest
  100. LinkSend 'control.LinkSend
  101. ListFields 'Set snapshot = recordset.ListFields( )
  102. ListIndexes 'Set snapshot = table.ListIndexes( )
  103. ListParam 'Set snapshot = querydef.ListParameters( )
  104. ListTables 'Set snapshot = database.ListTables( )
  105. LoadPic 'LoadPicture([stringexpression])
  106. Lock 'Lock [#]filenumber [,{record | [start] To end} ]
  107. Logarithm 'LogN(X) = Log(X) / Log(N)
  108. LSet1 'LSet stringvar = stringexpr
  109. LSet2 'LSet variable1 = variable2
  110. LTrim$ '[L | R]Trim[$](stringexpr)
  111. Mid$1 'Mid[$](stringexpr, start[, length])
  112. Mid$2 'Mid[$](stringvar, start [, length])  =  stringexpr
  113. MIRR 'MIRR(valuearray( ), financerate, reinvestrate)
  114. Mod 'result = operand1 Mod operand2
  115. Move '[object.]Move left[, top[, width[, height] ] ]
  116. MoveFirst 'recordset.MoveFirst
  117. MoveLast 'recordset.MoveLast
  118. MoveNext 'recordset.MoveNext
  119. MovePrev 'recordset.MovePrevious
  120. MsgBox1 'MsgBox(msg [, [type][, title] ] )
  121. MsgBox2 'MsgBox msg [, [type][, title] ]
  122. Name 'Name oldfilespec As newfilespec
  123. NewPage 'Printer.Newpage
  124. NPer 'NPer(rate, pmt, pv, fv, due)
  125. NPV 'NPV(rate, valuearray( ))
  126. OnError 'On Error { GoTo line | Resume Next | GoTo 0 }
  127. Open 'Open file [For mode] [Access access] [lock] As [#]filenumber [Len = reclen]
  128. OpenDB 'OpenDatabase( dbname [, exclusive [, readonly [, connect ]]] )
  129. OpenQD 'Set querydef = database.OpenQueryDef( name )
  130. OpenTable 'Set tableobject = dbobject.OpenTable(tablename [, options] )
  131. Partition 'Partition( number, start, stop, interval )
  132. Pmt 'Pmt(rate, nper, pv, fv, due)
  133. Point '[object.]Point(x,y)
  134. PopupMenu '[form.]PopupMenu menuname [, flags [, x [, y] ] ]
  135. PPmt 'PPmt(rate, per, nper, pv, fv, due)
  136. Print1 'Print # filenumber, [ [{Spc(n) | Tab(n)}][ expressionlist] [{; | ,}] ]
  137. Print2 '[object.]Print [{Spc(n) | Tab(n)}][expressionlist][{; | ,}] 
  138. PrinterNP 'Printer.Newpage
  139. PSet '[object.]PSet [Step](x, y)[,color]
  140. Put 'Put [#] filenumber, [recordnumber], variablename
  141. PV 'PV(rate, nper, pmt, fv, due)
  142. Rate 'Rate(nper, pmt, pv, fv, due, guess)
  143. ReDim 'ReDim [Preserve] varname(subscripts) [As type][, varname(subscripts) [As type] ] . . .
  144. RegisterDB 'RegisterDatabase dsn, driver, silent, attributes
  145. RemoveItem 'control.RemoveItem index
  146. Resume 'Resume { [0] | Next | line}
  147. RGB 'RGB (red, green, blue)
  148. Right$ 'Right[$](stringexpr, n)
  149. RSet 'RSet stringvar = stringexpr
  150. RTrim$ '[L | R]Trim[$](stringexpr)
  151. SavePic 'SavePicture picture, stringexpression
  152. Scale '[object.]Scale [(x1, y1) - (x2, y2)]
  153. Secant 'Sec(X) = 1 / Cos(X)
  154. Seek1 'Seek (filenumber)
  155. Seek2 'Seek [#]filenumber, position
  156. SendKeys 'SendKeys keytext [,wait]
  157. Set 'Set objectvar = {objectexpr | New formtype | Nothing}
  158. SetAttr 'SetAttr filename, attributes
  159. SetData 'Clipboard.SetData data,[ format]
  160. SetDefWS 'SetDefaultWorkspace username, password
  161. SetText 'Clipboard.SetText data [,format]
  162. Shell 'Shell(commandstring [, windowstyle])
  163. Show '[form.]Show [style]   Note style: 0 -> modeless, 1-> modal
  164. SLN 'SLN(cost, salvage, life)
  165. Space 'Space[$](number)
  166. Static 'Static varname[([subscripts])] [As [New] type] [, varname[([subscripts])] [As [New] type] ] . . .
  167. Str$ 'Str[$](number)
  168. StrComp 'StrComp(stringexpr1, stringexpr2 [, compare] )
  169. String$ 'String[$](number, charcode)
  170. Switch 'Switch( varexpr1, var1 [, varexpr2, var2 . . . [, varexpr7 ,var7 ]] )
  171. SYD 'SYD(cost, salvage, life, period)
  172. TextHeight '[object.]TextHeight(stringexpression)
  173. TextWidth '[object.]TextWidth(stringexpression)
  174. Time1 'Time[$][( )]
  175. Time2 'Time[$] = expression
  176. Timeserial 'TimeSerial(hour, minute, second)
  177. TimeValue 'TimeValue(stringexpression)
  178. Trim$ '[L | R]Trim[$](stringexpr)
  179. UBound 'UBound(array [, dimension])
  180. UCase 'UCase[$](stringexpr)
  181. UnLock 'Unlock [#]filenumber [,{record | [start] To end} ]
  182. Update 'recordset.Update
  183. UpdateControls 'datactrl.UpdateControls
  184. UpdateRecord 'datactrl.UpdateRecord
  185. Val 'Val(stringexpression)
  186. VarType 'VarType(variant)
  187. Width 'Width # filenumber, width
  188. Write 'Write # filenumber [, expressionlist]
  189. Xor 'result = expr1 Xor expr2
  190. ZOrder '[object.]ZOrder [position]  Note position: 0 -> front, 1 -> back
  191.